home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / lsp / assert.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  1.6 KB  |  70 lines
  1.  
  2. static L1();
  3. static L2();
  4. static L4();
  5. static L5();
  6. static L6();
  7. static L7();
  8. static L8();
  9. #define VC1 object  V6 ,V5 ,V4 ,V3 ,V2;
  10. #define VC2 object  V10 ,V9 ,V8;
  11. static object LI3();
  12. #define VMB3 object  V15;
  13. #define VMS3
  14. #define VMV3
  15. #define VMR3(VMT3) return(VMT3);
  16. #define VC4 object  V31 ,V30 ,V29 ,V21 ,V20;
  17. #define VC5 object  V55 ,V54 ,V53 ,V52 ,V51 ,V43 ,V42 ,V40 ,V36 ,V35 ,V34;
  18. #define VC6 object  V61 ,V60;
  19. #define VC7 object  V71 ,V70 ,V66 ,V65;
  20. #define VC8 object  V88 ,V87 ,V86 ,V85 ,V81 ,V80 ,V79 ,V75 ,V74 ,V73;
  21. static object LI9();
  22. #define VMB9 register object *base=vs_top; object  V116 ,V113 ,V112 ,V107 ,V103 ,V98;
  23. #define VMS9  register object *sup=vs_top+9;vs_top=sup;
  24. #define VMV9 vs_reserve(9);
  25. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  26. static object LI10();
  27. #define VMB10 object  V132 ,V130;
  28. #define VMS10
  29. #define VMV10
  30. #define VMR10(VMT10) return(VMT10);
  31. static object LI11();
  32. #define VMB11 object  V138 ,V137;
  33. #define VMS11
  34. #define VMV11
  35. #define VMR11(VMT11) return(VMT11);
  36. #define VM11 0
  37. #define VM10 0
  38. #define VM9 9
  39. #define VM8 6
  40. #define VM7 6
  41. #define VM6 5
  42. #define VM5 7
  43. #define VM4 7
  44. #define VM3 0
  45. #define VM2 7
  46. #define VM1 7
  47. static char * VVi[60]={
  48. #define Cdata VV[59]
  49. (char *)(L1),
  50. (char *)(L2),
  51. (char *)(LI3),
  52. (char *)(L4),
  53. (char *)(L5),
  54. (char *)(L6),
  55. (char *)(L7),
  56. (char *)(L8),
  57. (char *)(LI9),
  58. (char *)(LI10),
  59. (char *)(LI11)
  60. };
  61. #define VV ((object *)VVi)
  62. static object  LnkTLI58() ;
  63. static object  (*LnkLI58)() = LnkTLI58;
  64. static object  LnkTLI57() ;
  65. static object  (*LnkLI57)() = LnkTLI57;
  66. static object  LnkTLI56() ;
  67. static object  (*LnkLI56)() = LnkTLI56;
  68. static object  LnkTLI53() ;
  69. static object  (*LnkLI53)() = LnkTLI53;
  70.